Nuprl Lemma : combine-causal-bijections 11,40

es:ES, ABPQ:(E), TT':Type, R:(TT').
(e:E. (A(e B(e))  (valtype(eT))
 (e:E. (P(e Q(e))  (valtype(eT'))
 (e:E. (A(e) & B(e)))
 (e:E. (P(e) & Q(e)))
 (e:E. Dec(P(e)))
 (e:E. Dec(A(e)))
 (f:({e:E| A(e)} {e:E| P(e)} ), g:({e:E| B(e)} {e:E| Q(e)} ).
 (e.A(ee.f(e) e.P(e)) with R
  (e.B(ee.g(e) e.Q(e)) with R
  (h:{e:E| A(e B(e)} {e:E| P(e Q(e)} 
  (((e.A(e B(ee.h(e) e.P(e Q(e)) with R
  (& (e:{e:E| A(e B(e)} . A(e (h(e) = f(e)))
  (& (e:{e:E| A(e B(e)} . (A(e))  (h(e) = g(e)))))) 
latex


Definitionsx:AB(x), x:AB(x), P & Q, x:AB(x), {x:AB(x)} , P  Q, P  Q, A, x(s), s = t, E, f(a), {T}, Bij(A;B;f), e c e', (e.P(ea.f(a) e'.Q(e')) with R, t.1, let x,y = A in B(x;y), Dec(P), False, valtype(e), , EqDecider(T), EOrderAxioms(Epred?info), kind(e), type List, Msg(M), , val-axiom(E;V;M;info;pred?;init;Trans;Choose;Send;val;time), e < e', r  s, , x:A  B(x), Knd, kindcase(ka.f(a); l,t.g(l;t) ), xt(x), x,yt(x;y), IdLnk, constant_function(f;A;B), <ab>, loc(e), b, first(e), suptype(ST), Type, left + right, S  T, Top, x:A.B(x), Void, Unit, SWellFounded(R(x;y)), pred!(e;e'), , Id, EState(T), t  T, ES, P  Q, case b of inl(x) => s(x) | inr(y) => t(y), tt, ff, x.A(x), if b then t else f fi , True, b, P  Q, A c B, Inj(A;B;f), Surj(A;B;f), T, (e < e'), SQType(T), s ~ t, , val(e)
Lemmases-val wf, es-causl wf, es-causle wf, member wf, subtype rel set, bnot wf, assert of bnot, eqff to assert, iff transitivity, eqtt to assert, false wf, true wf, iff wf, bfalse wf, btrue wf, event system wf, unit wf, top wf, first wf, assert wf, not wf, constant function wf, EState wf, IdLnk wf, kindcase wf, Knd wf, rationals wf, bool wf, qle wf, cless wf, val-axiom wf, nat wf, Msg wf, loc wf, kind wf, Id wf, EOrderAxioms wf, deq wf, es-E wf, es-valtype wf, decidable wf, causal-bijection wf

origin